perm filename SCHART.UNF[TIM,LSP]2 blob sn#768071 filedate 1984-09-05 generic text, type T, neo UTF8
'(THIS IS THE UNFASL FOR ((DSK (TIM LSP)) SCHART LSP)) 
'(ASSEMBLED BY FASLAP /392) 
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117) 

;COMPILED ON SEPTEMBER 5, 1984, AT 10:12 PM

	(COMMENT **FASL** 0. (LAP GET-BENCH-DATA SUBR)) 
	(COMMENT **FASL** 4. (LAP GET-BENCH-ENTRY SUBR)) 
	(COMMENT **FASL** 8. (LAP |TRUNC MACRO| SUBR)) 
(COMMENT ****  (QUOTIENT X Y) Closed compilation forced in function TSAFE-QUOTIENT)
	(COMMENT **FASL** 45. (LAP TSAFE-QUOTIENT SUBR)) 
	(COMMENT **FASL** 73. (LAP |LOOKUP-FUN MACRO| SUBR)) 
(COMMENT ****  (LESSP Q R) Closed compilation forced in function CADR-LESSP)
	(COMMENT **FASL** 115. (LAP CADR-LESSP SUBR)) 
	(COMMENT **FASL** 138. (LAP |INFINITY-IZE MACRO| SUBR)) 
	(COMMENT **FASL** 168. (LAP FILTER-OUT SUBR)) 
(COMMENT ****  (LESSP 0. LEN) Closed compilation forced in function TRUNCATE-LIST)
(COMMENT ****  (SUB1 LEN) Closed compilation forced in function TRUNCATE-LIST)
	(COMMENT **FASL** 202. (LAP TRUNCATE-LIST SUBR)) 
	(COMMENT **FASL** 247. (LAP MAKE-A-CHART SUBR)) 
(COMMENT ****  (TIMES 100.0 (CADR IMPL-ENTRY)) 
		Closed compilation forced in function MAKE-ROWS)
	(COMMENT **FASL** 287. (LAP MAKE-ROWS SUBR)) 
	(COMMENT **FASL** 410. (LAP DO-SCHART-REAL SUBR)) 
	(COMMENT **FASL** 504. (LAP DO-SCHART-CPU SUBR)) 
	(COMMENT **FASL** 598. (LAP DO-SCHART1 SUBR)) 
(COMMENT ****  (SAFE-QUOTIENT ROUND) 
		have been used but remain undefined in this file)
	(COMMENT **FASL** TOTAL =  782. WORDS)